www.gusucode.com > 落叶冰点万能企业网站内容管理系统 V9.1 > 落叶冰点万能企业网站内容管理系统 V9.1\code\Label\custom_Label\产品商城系统标签库\nd_prod_tj_zt_list_a.asp
<%'$start_ext_newDsoft 以下系统生成,勿删! '$newDsoft_label_type$:loop_label_two_loop$end_newDsoft_label_type$ '$newDsoft_label_name$:prod_tj_zt_list$end_newDsoft_label_name$ '$newDsoft_label_sql$:select [ND_prod].id,[ND_prod].sys_content_type,[ND_prod].title,[ND_prod].SpecialID,[ND_prod].classid,[ND_prod].small_pic,[ND_prod].big_pic,[ND_prod].content,[ND_prod].is_new,[ND_prod].is_tuijian,[ND_prod].Hits,[ND_prod].WriteTime,[ND_prod].username,[ND_prod].out_and_inner_img_list,[ND_prod].Uploadfile_list,[ND_prod].UploadImage_list,[ND_prod].orders,[ND_prod].is_show_buy,[ND_prod].liulang_dengji_group_id,[ND_prod].dianshuo_to_look,[ND_prod].is_shenhe,[ND_prod].is_can_pinlun,[ND_prod].is_auto_fenye,[ND_prod].xiangguan_keywords_list,[ND_prod].is_outlink,[ND_prod].outlink from [ND_prod]$end_newDsoft_label_sql$ '$newDsoft_label_params$:cid,产品分类的id,为”all”或””(空) 则显示全部产品,1|picwidth,产品缩略图显示宽度,3|picheight,产品缩略图显示高度,3|width,显示宽度,3|lent,产品名称最大显示长度,3|cols,每行显示数量,3|nums,每页显示数,3|url,点产品后转向的页面的文件名,2|iszi,是否显示子分类的产品,为0则不显示,否则显示,3|sys_content_type,频道栏目id,1$end_newDsoft_label_params$ '$newDsoft_label_fenye_num$:$xxvar$nums$end_newDsoft_label_fenye_num$ '$newDsoft_label_beizhu$:显示推荐产品列表$end_newDsoft_label_beizhu$ '$newDsoft_is_sys_label$:0$end_newDsoft_is_sys_label$ '$newDsoft_other_params$:hhend:</table>|hhks:$$sx_aspcodex_startx1$$$sx_aspcodex_huanhang$wwwll=$xxvar$picwidth+7$$sx_aspcodex_huanhang$hhhll=$xxvar$picheight+7$$sx_aspcodex_huanhang$hhhllk=$xxvar$picheight+7+15$$sx_aspcodex_huanhang$$$sx_aspcodex_huanhang$hhhllk2=$xxvar$picheight+7+15+15$$sx_aspcodex_huanhang$wwwll2=$xxvar$picwidth+7+10$$sx_aspcodex_huanhang$$$sx_aspcodex_endx1$$$sx_aspcodex_huanhang$$$sx_aspcodex_huanhang$<style type="text/css">$$sx_aspcodex_huanhang$<!--$$sx_aspcodex_huanhang$.cpcp {width$$sx_maohao$$xxvar$picwidth px;height$$sx_maohao$$xxvar$picheight px;}$$sx_aspcodex_huanhang$.cpcpb {width$$sx_maohao$$$sx_aspcodex_startx1$=wwwll$$sx_aspcodex_endx1$ px;height$$sx_maohao$$$sx_aspcodex_startx1$=hhhll$$sx_aspcodex_endx1$ px;}$$sx_aspcodex_huanhang$.cpcpbx {width$$sx_maohao$$$sx_aspcodex_startx1$=wwwll$$sx_aspcodex_endx1$ px;height$$sx_maohao$$$sx_aspcodex_startx1$=hhhllk$$sx_aspcodex_endx1$ px;}$$sx_aspcodex_huanhang$.cpcpbxx {width$$sx_maohao$$$sx_aspcodex_startx1$=wwwll2$$sx_aspcodex_endx1$ px;height$$sx_maohao$$$sx_aspcodex_startx1$=hhhllk2$$sx_aspcodex_endx1$ px;}$$sx_aspcodex_huanhang$.nolnk a{text-decoration$$sx_maohao$ none;}$$sx_aspcodex_huanhang$$$sx_aspcodex_huanhang$.tud{text-decoration$$sx_maohao$ line-through;}$$sx_aspcodex_huanhang$.wid_100{width$$sx_maohao$100%}$$sx_aspcodex_huanhang$.wid_40{width$$sx_maohao$40%}$$sx_aspcodex_huanhang$$$sx_aspcodex_huanhang$$$sx_aspcodex_huanhang$--></style>$$sx_aspcodex_huanhang$$$sx_aspcodex_huanhang$<table border="0" cellpadding="0" cellspacing="0" width="$xxvar$width">$$sx_aspcodex_huanhang$|sql_run:$$sx_aspcodex_startx1$$$sx_aspcodex_huanhang$cccccccid=$xxvar$cid$$sx_aspcodex_huanhang$sql2=""$$sx_aspcodex_huanhang$biao="[ND_prod_class]"$$sx_aspcodex_huanhang$isziii=cstr($xxvar$iszi)$$sx_aspcodex_huanhang$$$sx_aspcodex_huanhang$if isziii<>"0" then$$sx_aspcodex_huanhang$$$sx_aspcodex_huanhang$$$sx_aspcodex_huanhang$if cccccccid<>"all" and cccccccid<>"" then$$sx_aspcodex_huanhang$$$sx_aspcodex_huanhang$$$sx_aspcodex_huanhang$set Rs33=server.CreateObject("adodb.recordset")$$sx_aspcodex_huanhang$sql="select cstr(parent_id_list) from "&biao&" where id="&cccccccid$$sx_aspcodex_huanhang$Rs33.open sql,newdsoft_conn_obj,1,1$$sx_aspcodex_huanhang$$$sx_aspcodex_huanhang$sspa=rs33(0)&","&cccccccid&","$$sx_aspcodex_huanhang$$$sx_aspcodex_huanhang$sql2=" and (classid='"&cccccccid&"' or classid in (select cstr(id) from "&biao&" where parent_id_list like '%"&sspa&"%' ) or classid in (select cstr(id) from "&biao&" where parent_id='"&cccccccid&"') ) "$$sx_aspcodex_huanhang$end if$$sx_aspcodex_huanhang$else$$sx_aspcodex_huanhang$$$sx_aspcodex_huanhang$if cccccccid<>"all" and cccccccid<>"" then$$sx_aspcodex_huanhang$$$sx_aspcodex_huanhang$sql2=" and (classid='"&cccccccid&"') "$$sx_aspcodex_huanhang$end if$$sx_aspcodex_huanhang$$$sx_aspcodex_huanhang$$$sx_aspcodex_huanhang$end if$$sx_aspcodex_huanhang$$$sx_aspcodex_huanhang$$$sx_aspcodex_huanhang$sql="select * from [ND_prod] where is_shenhe='1' and is_tuijian='1' and sys_content_type='"&$xxvar$sys_content_type&"' "&sql2&" order by clng(orders) asc,id desc"$$sx_aspcodex_huanhang$$$sx_aspcodex_endx1$|iffen:1|di2xh_num:$xxvar$cols|run_asp1:|run_asp2:|yi_ksdaima2:<tr>|ksdaima2:<td>$$sx_aspcodex_huanhang$$$sx_aspcodex_startx1$$$sx_aspcodex_huanhang$sedesdsz="&id="&request("id")&"&cid="&rszcpcp("classid")$$sx_aspcodex_huanhang$$$sx_aspcodex_huanhang$if rszcpcp("is_outlink")="1" then$$sx_aspcodex_huanhang$$$sx_aspcodex_huanhang$suuurl=rszcpcp("outlink")$$sx_aspcodex_huanhang$else$$sx_aspcodex_huanhang$$$sx_aspcodex_huanhang$suuurl="$xxvar$url?cpid="&rszcpcp("id")&sedesdsz$$sx_aspcodex_huanhang$$$sx_aspcodex_huanhang$end if$$sx_aspcodex_huanhang$$$sx_aspcodex_huanhang$$$sx_aspcodex_endx1$|jiesdaima2:</td>|yi_jiesdaima22:</tr>|rsname:rszcpcp|htmledxa:1|htmledxb:$end_newDsoft_other_params$ '$end_ext_newDsoft%> <div></div> <table cellspacing="0" cellpadding="0" width="100%" border="0"> <tbody> <tr> <td class="<%if cstr(rszcpcp("is_show_buy"))="1" then response.write "wid_40"%>"> <table class="cpcpbxx" cellspacing="0" cellpadding="0" border="0"> <tbody> <tr> <td valign="middle" align="center"> <table class="cpcpbx" cellspacing="1" cellpadding="1" bgcolor="#cccccc" border="0"> <tbody> <tr> <% sedesdsz="&id="&request("id") %> <td class="cpcpb" valign="middle" align="center" bgcolor="#ffffff"><a target="_self" href="<%=suuurl%>"><img class="cpcp" alt="" border="0" src="<%=rszcpcp("small_pic")%>" /></a></td> </tr> <%if cstr(rszcpcp("is_show_buy"))<>"1" then%> <tr> <td class="nolnk" style="word-break: break-all" valign="middle" align="center" bgcolor="#ffffff" height="15"><a target="_self" href="<%=suuurl%>"><%=gotTopic(rszcpcp("title"),$xxvar$lent)%></a></td> </tr> <%end if%> </tbody> </table> </td> </tr> </tbody> </table> </td> <%if cstr(rszcpcp("is_show_buy"))="1" then%> <td colspan="2"> <table cellspacing="0" cellpadding="0" width="200" border="0"> <tbody> <tr> <td>产品名称:</td> <td><a target="_self" href="<%=suuurl%>"><%=rszcpcp("title")%></a></td> </tr> <tr> <td>产品型号:</td> <td><a target="_self" href="<%=suuurl%>"><%=rszcpcp("xinghao")%></a></td> </tr> <tr> <td colspan="2"><% set rsrr1=server.CreateObject("adodb.recordset") sql="select * from [ND_userGroup] where id<>1 order by clng(grades) asc" rsrr1.open sql,newdsoft_conn_obj,1,1 havevipj=0 do while not rsrr1.eof if cstr(findx_price(rsrr1("id"),rszcpcp("price2_gradelist")))<>"" and cstr(findx_price(rsrr1("id"),rszcpcp("price2_gradelist")))<>"0" then havevipj=1 end if rsrr1.movenext loop %>市场价: <span class="<%if havevipj=1 then response.write "tud"%>"><%=rszcpcp("price1")%></span>元<br /> <% set rsrr=server.CreateObject("adodb.recordset") sql="select * from [ND_userGroup] where id<>1 order by clng(grades) asc" rsrr.open sql,newdsoft_conn_obj,1,1 do while not rsrr.eof %><%=rsrr("name")%>价: <%=findx_price(rsrr("id"),rszcpcp("price2_gradelist"))%>元<br /> <% rsrr.movenext loop %></td> </tr> <tr> <td colspan="2" rowspan="2"><span style="color: #0000ff"><b><a target="_blank" href="$page$cp_vip_user_page$?action=cart_p<%="&"%>id=<%=rszcpcp("id")%>"> [在线购买这个产品]</a></b></span> <br /> <span style="color: #0000ff"><b><a target="_blank" href="$page$cp_vip_user_page$?action=addto_p<%="&"%>action2=add<%="&"%>id=<%=rszcpcp("id")%>"> [放入购物车]</a></b></span></td> </tr> <tr> </tr> </tbody> </table> </td> <%end if%> </tr> </tbody> </table> <div></div>